/*Sa se gaseasca maximul elementelor in valoare absoluta  dintr-un sir
de numere reale.*/
# include <stdio.h>
# include <conio.h>
# include <math.h>

double a[100],max;
int i,n;
void main (void)
{ clrscr();
printf ("n= ");scanf("%d",&n);
for (i=0;i<n;i++)
	 {
	  printf("a[%d]= ",i);
	  scanf("%lf",&a[i]);
	  }
for (i=0;i<n;i++)
	printf ("a[%d]=%lf ",i,a[i]);
	printf (" \n");
max=fabsl(a[0]);
  for (i=0;i<n;i++)
	if (max<fabsl(a[i])) max=fabsl(a[i]);
printf (" maximul in valoare absoluta este %lf", -max);
getch();
}